home *** CD-ROM | disk | FTP | other *** search
- // Borland C++ Builder
- // Copyright (c) 1995, 1998 by Borland International
- // All rights reserved
-
- // (DO NOT EDIT: machine generated header) 'OleCtrls.pas' rev: 3.00
-
- #ifndef OleCtrlsHPP
- #define OleCtrlsHPP
- #include <AxCtrls.hpp>
- #include <ComObj.hpp>
- #include <Graphics.hpp>
- #include <Menus.hpp>
- #include <Forms.hpp>
- #include <Controls.hpp>
- #include <Classes.hpp>
- #include <SysUtils.hpp>
- #include <ActiveX.hpp>
- #include <Messages.hpp>
- #include <Windows.hpp>
- #include <SysInit.hpp>
- #include <System.hpp>
-
- //-- user supplied -----------------------------------------------------------
-
- namespace Olectrls
- {
- //-- type declarations -------------------------------------------------------
- class DELPHICLASS TEventDispatch;
- class DELPHICLASS TOleControl;
- struct TControlData;
- typedef TControlData *PControlData;
-
- typedef short TOleEnum;
-
- class DELPHICLASS TEnumPropDesc;
- class PASCALIMPLEMENTATION TOleControl : public Controls::TWinControl
- {
- typedef Controls::TWinControl inherited;
-
- private:
- void *__IUnknown; /* IUnknown */
- void *__IOleClientSite; /* IOleClientSite */
- void *__IOleControlSite; /* IOleControlSite [TranslateAccelerator=OleControlSite_TranslateAccelerator
- ] */
- void *__IOleInPlaceSite; /* IOleInPlaceSite [GetWindow=OleInPlaceSite_GetWindow] */
- void *__IOleInPlaceFrame; /* IOleInPlaceFrame [TranslateAccelerator=OleInPlaceFrame_TranslateAccelerator,
- GetWindow=OleInPlaceFrame_GetWindow] */
- void *__IDispatch; /* IDispatch */
- void *__IPropertyNotifySink; /* IPropertyNotifySink */
- void *__ISimpleFrameSite; /* ISimpleFrameSite */
-
- public:
- operator ISimpleFrameSite*(void) { return (ISimpleFrameSite*)&__ISimpleFrameSite; }
- operator IPropertyNotifySink*(void) { return (IPropertyNotifySink*)&__IPropertyNotifySink; }
- operator IDispatch*(void) { return (IDispatch*)&__IDispatch; }
- operator IOleInPlaceFrame*(void) { return (IOleInPlaceFrame*)&__IOleInPlaceFrame; }
- operator IOleInPlaceSite*(void) { return (IOleInPlaceSite*)&__IOleInPlaceSite; }
- operator IOleControlSite*(void) { return (IOleControlSite*)&__IOleControlSite; }
- operator IOleClientSite*(void) { return (IOleClientSite*)&__IOleClientSite; }
- operator IUnknown*(void) { return (IUnknown*)&__IUnknown; }
-
- private:
- TControlData *FControlData;
- int FRefCount;
- TEventDispatch* FEventDispatch;
- int FObjectData;
- _di_IOleObject FOleObject;
- _di_IPersistStreamInit FPersistStream;
- _di_IOleControl FOleControl;
- _di_IDispatch FControlDispatch;
- _di_IPerPropertyBrowsing FPropBrowsing;
- _di_IOleInPlaceObject FOleInPlaceObject;
- _di_IOleInPlaceActiveObject FOleInPlaceActiveObject;
- int FPropConnection;
- int FEventsConnection;
- int FMiscStatus;
- Classes::TList* FFonts;
- Classes::TList* FPictures;
- bool FUpdatingPictures;
- bool FUpdatingColor;
- bool FUpdatingFont;
- bool FUpdatingEnabled;
- HIDESBASE HRESULT __stdcall QueryInterface(const GUID &IID, /* out */ void *Obj);
- HIDESBASE int __stdcall _AddRef(void);
- HIDESBASE int __stdcall _Release(void);
- HRESULT __stdcall SaveObject(void);
- HRESULT __stdcall GetMoniker(int dwAssign, int dwWhichMoniker, /* out */ _di_IMoniker &mk);
- HRESULT __stdcall GetContainer(/* out */ _di_IOleContainer &container);
- HRESULT __stdcall ShowObject(void);
- HRESULT __stdcall OnShowWindow(BOOL fShow);
- HRESULT __stdcall RequestNewObjectLayout(void);
- HRESULT __stdcall OnControlInfoChanged(void);
- HRESULT __stdcall LockInPlaceActive(BOOL fLock);
- HRESULT __stdcall GetExtendedControl(/* out */ _di_IDispatch &disp);
- HRESULT __stdcall TransformCoords(tagPOINT &ptlHimetric, tagPOINTF &ptfContainer, int flags);
- HRESULT __stdcall OleControlSite_TranslateAccelerator(Windows::PMsg msg, int grfModifiers);
- HRESULT __stdcall OnFocus(BOOL fGotFocus);
- HRESULT __stdcall ShowPropertyFrame(void);
- HRESULT __stdcall ContextSensitiveHelp(BOOL fEnterMode);
- HRESULT __stdcall OleInPlaceSite_GetWindow(/* out */ HWND &wnd);
- HRESULT __stdcall CanInPlaceActivate(void);
- HRESULT __stdcall OnInPlaceActivate(void);
- HRESULT __stdcall OnUIActivate(void);
- HRESULT __stdcall GetWindowContext(/* out */ _di_IOleInPlaceFrame &frame, /* out */ _di_IOleInPlaceUIWindow
- &doc, /* out */ Windows::TRect &rcPosRect, /* out */ Windows::TRect &rcClipRect, /* out */ tagOIFI
- &frameInfo);
- HRESULT __stdcall Scroll(const tagPOINT scrollExtent);
- HRESULT __stdcall OnUIDeactivate(BOOL fUndoable);
- HRESULT __stdcall OnInPlaceDeactivate(void);
- HRESULT __stdcall DiscardUndoState(void);
- HRESULT __stdcall DeactivateAndUndo(void);
- HRESULT __stdcall OnPosRectChange(const Windows::TRect &rcPosRect);
- HRESULT __stdcall GetBorder(/* out */ Windows::TRect &rectBorder);
- HRESULT __stdcall RequestBorderSpace(const Windows::TRect &borderwidths);
- HRESULT __stdcall SetBorderSpace(Windows::PRect pborderwidths);
- HRESULT __stdcall SetActiveObject(const _di_IOleInPlaceActiveObject activeObject, wchar_t * pszObjName
- );
- HRESULT __stdcall OleInPlaceFrame_GetWindow(/* out */ HWND &wnd);
- HRESULT __stdcall InsertMenus(HMENU hmenuShared, tagOleMenuGroupWidths &menuWidths);
- HRESULT __stdcall SetMenu(HMENU hmenuShared, HMENU holemenu, HWND hwndActiveObject);
- HRESULT __stdcall RemoveMenus(HMENU hmenuShared);
- HRESULT __stdcall SetStatusText(wchar_t * pszStatusText);
- HRESULT __stdcall EnableModeless(BOOL fEnable);
- HRESULT __stdcall OleInPlaceFrame_TranslateAccelerator(tagMSG &msg, Word wID);
- HIDESBASE HRESULT __stdcall GetTypeInfoCount(/* out */ int &Count);
- HIDESBASE HRESULT __stdcall GetTypeInfo(int Index, int LocaleID, /* out */ void *TypeInfo);
- HIDESBASE HRESULT __stdcall GetIDsOfNames(const GUID &IID, void * Names, int NameCount, int LocaleID
- , void * DispIDs);
- HIDESBASE HRESULT __stdcall Invoke(int DispID, const GUID &IID, int LocaleID, Word Flags, void *Params
- , void * VarResult, void * ExcepInfo, void * ArgErr);
- HRESULT __stdcall OnChanged(int dispid);
- HRESULT __stdcall OnRequestEdit(int dispid);
- HRESULT __stdcall PreMessageFilter(HWND wnd, int msg, int wp, int lp, /* out */ int &res, /* out */
- int &Cookie);
- HRESULT __stdcall PostMessageFilter(HWND wnd, int msg, int wp, int lp, /* out */ int &res, int Cookie
- );
- void __fastcall CreateControl(void);
- void __fastcall CreateEnumPropDescs(void);
- void __fastcall CreateInstance(void);
- void __fastcall CreateStorage(void);
- void __fastcall DesignModified(void);
- void __fastcall DestroyControl(void);
- void __fastcall DestroyEnumPropDescs(void);
- void __fastcall DestroyStorage(void);
- void __fastcall GetEventMethod(int DispID, Sysutils::TMethod &Method);
- Menus::TMainMenu* __fastcall GetMainMenu(void);
- System::Variant __fastcall GetOleObject(void);
- _di_IDispatch __fastcall GetDefaultDispatch(void);
- void __fastcall HookControlWndProc(void);
- void __fastcall InvokeEvent(int DispID, tagDISPPARAMS &Params);
- void __fastcall ReadData(Classes::TStream* Stream);
- void __fastcall SetUIActive(bool Active);
- void __fastcall StandardEvent(int DispID, tagDISPPARAMS &Params);
- void __fastcall WriteData(Classes::TStream* Stream);
- HIDESBASE MESSAGE void __fastcall WMEraseBkgnd(Messages::TWMEraseBkgnd &Message);
- HIDESBASE MESSAGE void __fastcall WMPaint(Messages::TWMPaint &Message);
- MESSAGE void __fastcall CMDocWindowActivate(Messages::TMessage &Message);
- HIDESBASE MESSAGE void __fastcall CMColorChanged(Messages::TMessage &Message);
- HIDESBASE MESSAGE void __fastcall CMEnabledChanged(Messages::TMessage &Message);
- HIDESBASE MESSAGE void __fastcall CMFontChanged(Messages::TMessage &Message);
- HIDESBASE MESSAGE void __fastcall CMDialogKey(Messages::TMessage &Message);
- MESSAGE void __fastcall CMUIActivate(Messages::TMessage &Message);
- MESSAGE void __fastcall CMUIDeactivate(Messages::TMessage &Message);
- void __fastcall D2InvokeEvent(int DispID, tagDISPPARAMS &Params);
-
- protected:
- int FEvents;
- virtual void __fastcall CreateWnd(void);
- virtual void __fastcall DefaultHandler(void *Message);
- virtual void __fastcall DefineProperties(Classes::TFiler* Filer);
- virtual void __fastcall DestroyWindowHandle(void);
- Byte __fastcall GetByteProp(int Index);
- Graphics::TColor __fastcall GetColorProp(int Index);
- Graphics::TColor __fastcall GetTColorProp(int Index);
- System::Comp __fastcall GetCompProp(int Index);
- System::Currency __fastcall GetCurrencyProp(int Index);
- double __fastcall GetDoubleProp(int Index);
- _di_IDispatch __fastcall GetIDispatchProp(int Index);
- int __fastcall GetIntegerProp(int Index);
- _di_IUnknown __fastcall GetIUnknownProp(int Index);
- Word __fastcall GetWordBoolProp(int Index);
- System::TDateTime __fastcall GetTDateTimeProp(int Index);
- Graphics::TFont* __fastcall GetTFontProp(int Index);
- Word __fastcall GetOleBoolProp(int Index);
- double __fastcall GetOleDateProp(int Index);
- TOleEnum __fastcall GetOleEnumProp(int Index);
- TOleEnum __fastcall GetTOleEnumProp(int Index);
- System::OleVariant __fastcall GetOleVariantProp(int Index);
- Graphics::TPicture* __fastcall GetTPictureProp(int Index);
- void __fastcall GetProperty(int Index, System::TVarData &Value);
- Shortint __fastcall GetShortIntProp(int Index);
- float __fastcall GetSingleProp(int Index);
- short __fastcall GetSmallintProp(int Index);
- System::AnsiString __fastcall GetStringProp(int Index);
- System::Variant __fastcall GetVariantProp(int Index);
- System::WideString __fastcall GetWideStringProp(int Index);
- Word __fastcall GetWordProp(int Index);
- virtual void __fastcall InitControlData(void) = 0;
- virtual void __fastcall InitControlInterface(const _di_IUnknown Obj);
- void __fastcall InvokeMethod(const void *DispInfo, void * Result);
- DYNAMIC bool __fastcall PaletteChanged(bool Foreground);
- void __fastcall PictureChanged(System::TObject* Sender);
- void __fastcall SetByteProp(int Index, Byte Value);
- void __fastcall SetColorProp(int Index, Graphics::TColor Value);
- void __fastcall SetTColorProp(int Index, Graphics::TColor Value);
- void __fastcall SetCompProp(int Index, const System::Comp Value);
- void __fastcall SetCurrencyProp(int Index, const System::Currency Value);
- void __fastcall SetDoubleProp(int Index, const double Value);
- void __fastcall SetIDispatchProp(int Index, const _di_IDispatch Value);
- void __fastcall SetIntegerProp(int Index, int Value);
- void __fastcall SetIUnknownProp(int Index, const _di_IUnknown Value);
- virtual void __fastcall SetName(const System::AnsiString Value);
- void __fastcall SetWordBoolProp(int Index, Word Value);
- void __fastcall SetTDateTimeProp(int Index, const System::TDateTime Value);
- void __fastcall SetTFontProp(int Index, Graphics::TFont* Value);
- void __fastcall SetOleBoolProp(int Index, Word Value);
- void __fastcall SetOleDateProp(int Index, const double Value);
- void __fastcall SetOleEnumProp(int Index, TOleEnum Value);
- void __fastcall SetTOleEnumProp(int Index, TOleEnum Value);
- void __fastcall SetOleVariantProp(int Index, const System::OleVariant &Value);
- virtual void __fastcall SetParent(Controls::TWinControl* AParent);
- void __fastcall SetTPictureProp(int Index, Graphics::TPicture* Value);
- void __fastcall SetProperty(int Index, const System::TVarData &Value);
- void __fastcall SetShortIntProp(int Index, Shortint Value);
- void __fastcall SetSingleProp(int Index, const float Value);
- void __fastcall SetSmallintProp(int Index, short Value);
- void __fastcall SetStringProp(int Index, const System::AnsiString Value);
- void __fastcall SetVariantProp(int Index, const System::Variant &Value);
- void __fastcall SetWideStringProp(int Index, const System::WideString Value);
- void __fastcall SetWordProp(int Index, Word Value);
- virtual void __fastcall WndProc(Messages::TMessage &Message);
- __property PControlData ControlData = {read=FControlData, write=FControlData};
-
- public:
- __fastcall virtual TOleControl(Classes::TComponent* AOwner);
- __fastcall virtual ~TOleControl(void);
- void __fastcall BrowseProperties(void);
- void __fastcall DoObjectVerb(int Verb);
- TEnumPropDesc* __fastcall GetEnumPropDesc(int DispID);
- bool __fastcall GetHelpContext(System::AnsiString Member, int &HelpCtx, System::AnsiString &HelpFile
- );
- void __fastcall GetObjectVerbs(Classes::TStrings* List);
- System::AnsiString __fastcall GetPropDisplayString(int DispID);
- void __fastcall GetPropDisplayStrings(int DispID, Classes::TStrings* List);
- bool __fastcall IsCustomProperty(int DispID);
- virtual void __fastcall SetBounds(int ALeft, int ATop, int AWidth, int AHeight);
- void __fastcall SetPropDisplayString(int DispID, const System::AnsiString Value);
- void __fastcall ShowAboutBox(void);
- __property System::Variant OleObject = {read=GetOleObject};
- __property _di_IDispatch DefaultDispatch = {read=GetDefaultDispatch};
- __property TabStop ;
- public:
- /* TWinControl.CreateParented */ __fastcall TOleControl(HWND ParentWindow) : Controls::TWinControl(
- ParentWindow) { }
-
- };
-
- class PASCALIMPLEMENTATION TEventDispatch : public System::TObject
- {
- typedef System::TObject inherited;
-
- private:
- void *__IUnknown; /* IUnknown */
- void *__IDispatch; /* IDispatch */
-
- public:
- operator IDispatch*(void) { return (IDispatch*)&__IDispatch; }
- operator IUnknown*(void) { return (IUnknown*)&__IUnknown; }
-
- private:
- TOleControl* FControl;
- HRESULT __stdcall QueryInterface(const GUID &IID, /* out */ void *Obj);
- int __stdcall _AddRef(void);
- int __stdcall _Release(void);
- HRESULT __stdcall GetTypeInfoCount(/* out */ int &Count);
- HRESULT __stdcall GetTypeInfo(int Index, int LocaleID, /* out */ void *TypeInfo);
- HRESULT __stdcall GetIDsOfNames(const GUID &IID, void * Names, int NameCount, int LocaleID, void *
- DispIDs);
- HRESULT __stdcall Invoke(int DispID, const GUID &IID, int LocaleID, Word Flags, void *Params, void *
- VarResult, void * ExcepInfo, void * ArgErr);
-
- public:
- __fastcall TEventDispatch(TOleControl* Control);
- public:
- /* TObject.Destroy */ __fastcall virtual ~TEventDispatch(void) { }
-
- };
-
- struct TEnumValue
- {
- int Value;
- System::AnsiString Ident;
- } ;
-
- typedef TEnumValue TEnumValueList[32768];
-
- typedef TEnumValueList *PEnumValueList;
-
- class PASCALIMPLEMENTATION TEnumPropDesc : public System::TObject
- {
- typedef System::TObject inherited;
-
- private:
- int FDispID;
- int FValueCount;
- TEnumValueList *FValues;
-
- public:
- __fastcall TEnumPropDesc(int DispID, int ValueCount, const _di_ITypeInfo TypeInfo);
- __fastcall virtual ~TEnumPropDesc(void);
- void __fastcall GetStrings(Classes::TGetStrProc Proc);
- int __fastcall StringToValue(const System::AnsiString S);
- System::AnsiString __fastcall ValueToString(int V);
- };
-
- struct TControlData
- {
- GUID ClassID;
- GUID EventIID;
- int EventCount;
- void *EventDispIDs;
- void *LicenseKey;
- int Flags;
- int Version;
- int FontCount;
- Activex::TDispIDList *FontIDs;
- int PictureCount;
- Activex::TDispIDList *PictureIDs;
- int Reserved;
- int InstanceCount;
- Classes::TList* EnumPropDescs;
- } ;
-
- class DELPHICLASS EOleCtrlError;
- class PASCALIMPLEMENTATION EOleCtrlError : public Sysutils::Exception
- {
- typedef Sysutils::Exception inherited;
-
- public:
- /* Exception.Create */ __fastcall EOleCtrlError(const System::AnsiString Msg) : Sysutils::Exception(
- Msg) { }
- /* Exception.CreateFmt */ __fastcall EOleCtrlError(const System::AnsiString Msg, const System::TVarRec
- * Args, const int Args_Size) : Sysutils::Exception(Msg, Args, Args_Size) { }
- /* Exception.CreateRes */ __fastcall EOleCtrlError(int Ident, Extended Dummy) : Sysutils::Exception(
- Ident, Dummy) { }
- /* Exception.CreateResFmt */ __fastcall EOleCtrlError(int Ident, const System::TVarRec * Args, const
- int Args_Size) : Sysutils::Exception(Ident, Args, Args_Size) { }
- /* Exception.CreateHelp */ __fastcall EOleCtrlError(const System::AnsiString Msg, int AHelpContext)
- : Sysutils::Exception(Msg, AHelpContext) { }
- /* Exception.CreateFmtHelp */ __fastcall EOleCtrlError(const System::AnsiString Msg, const System::TVarRec
- * Args, const int Args_Size, int AHelpContext) : Sysutils::Exception(Msg, Args, Args_Size, AHelpContext
- ) { }
- /* Exception.CreateResHelp */ __fastcall EOleCtrlError(int Ident, int AHelpContext) : Sysutils::Exception(
- Ident, AHelpContext) { }
- /* Exception.CreateResFmtHelp */ __fastcall EOleCtrlError(int Ident, const System::TVarRec * Args,
- const int Args_Size, int AHelpContext) : Sysutils::Exception(Ident, Args, Args_Size, AHelpContext)
- { }
-
- public:
- /* TObject.Destroy */ __fastcall virtual ~EOleCtrlError(void) { }
-
- };
-
- //-- var, const, procedure ---------------------------------------------------
- extern PACKAGE System::Variant __fastcall FontToOleFont(Graphics::TFont* Font);
- extern PACKAGE void __fastcall OleFontToFont(const System::Variant &OleFont, Graphics::TFont* Font);
-
-
- } /* namespace Olectrls */
- #if !defined(NO_IMPLICIT_NAMESPACE_USE)
- using namespace Olectrls;
- #endif
- //-- end unit ----------------------------------------------------------------
- #endif // OleCtrls
-